Top 10k strings from New-Supercode (1986)(J. Gajdecki Software)(pl)[a].z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /
Back to the directory listing
9 LIWIA PISANIE 50 ZNAK 9 POD;ADRES 62208 I URUCHOMI 8 FUNKCJI AT i TAB 7 W W;WIERSZU.ABY UZYSKA 7 TEN EFEKT;NALE 6 PROCEDURA TA JEST UMIESZCZONA;POD ADRESEM 43746 ABY J 4 ENIA EKRANU (ADR); 4 ;W EKRAN. EKRAN W 4 POD ADRES (ADR); 3 AD ZASTOSOWANIA:; 2 W W;WIERSZUO 2 TA JEST UMIESZCZONA;POD ADRESEM 43746 ABY J 2 R$,N$,S$,D$,A$,W$: 2 EMY USTALI 2 D$="NEW SUPERCODE": 2 CI;EKRANU W OKRE 2 ;" NACI 2 48994,SZEROKO 2 48991,KOLUMNA POCZ.; 2 48983,WYSOKO 2 48982,WIERSZ POCZ.; 2 23607,HA","1" 2 KOD POD WYBRANY;ADRES (ADR') ADR=ADR'-256; 2 EGRANU","0" 2 ADRES POCZ 1 ~KOLOR ~:; 1 eecccefddbgceahbf`iag_j`h^k_i]l^j\m]k[n\lZo[mYpZnXqYoWrXpVsWqUtVrTuUrPpRoSnTmUlVkWjXiYhZg[f\e]d^c_b`aabd`bae_c`f^d_g]e^h\f]i[g\jZ 1 d$="NEW-SUPERCODE": 1 YJEMY TEN;PODPROGRAM TO EKRAN;UMIESZCZONY POD ADRESEM;(ADR) ZOSTANIE PRZENIESIONY;POD ADRES 16384; 1 Y:;KURSOR ( 1 X=(256-XS*8* 1 X:dXGy2dX:DXOx2DXy2$X 1 X,Y W KODZIE;MASZYNOWYM.; 1 X W KODZIE;MASZYNOWYM; 1 WCZAS;KURSOREM ( 1 W,ABY;WYWO 1 TKOWE","0" 1 TKOWA~;ZAWIERA POLSKIE LITERY;KOD-LITERA;58- 1 TEJ PRZEZ BASIC;NALE 1 TE;KONTURY SIATK 1 T DO SPISU" 1 SZE INSTRUKCJE;d$=~napis~ y=PO 1 STO.;437500/f-30.125","1" 1 S$="46882": 1 RODKA","46968","40","PROGRAM PRZESUWA PO 1 REGO WYKONANY;B 1 RA;ADRES POLO 1 PNIE NACISN 1 OWY;EKRANU DO 1 O","43515","27","PROGRAM DRUKUJE KO 1 NIJ KLAWISZ ~A~": 1 NIJ DOWOLNY KLAWISZ": 1 NIJ DOWOLNY KLAWISZ" 1 NIENIE","0" 1 NIE MUSIMY NACISKA 1 NIA ZAMKNI 1 NAPISANY W KODZIE;MASZYNOWYM.;D 1 NAPISANA W;KODZIE MASZYNOWYM; 1 LONYM OKNIE;W D 1 LONYM OKNIE;DO G 1 LIWIA TWORZENIE;NAPIS 1 LI POD ADRES (ADR);WPISZEMY ~ 1 LA ZNAK;Z JAKIEGO B 1 KSZEJ CZCIONKI;DO PROGRAMU NALE 1 KODU MASZYNOWEGO 1 K4","46946","21","SPECJALNY EFEKT DZWI 1 J$=" PROGRAM NIE DEMONSTRUJE SI 1 H$(I)=R$(1 1 ENIE;EKRANU I;PRZESUWAMY TRE 1 ENIE napisu;xs=szeroko 1 ELI NUMER;PRZYK 1 E LITERY;ABY URUCHOMI 1 DZY JEDNYM 1 DZIE ZBUDOWANA;RAMKA;NIE RELOKOWA 1 DZIE SKOK MO 1 DU W PROGRAMIE;WIERSZ DO KT 1 DNYCH X,Y,R; 1 DNE PUNKTU;WEWN 1 D$="~50~": 1 D$="sinclair": 1 D$="ZX Spectrum": 1 D$="ZABAWY": 1 D$="Program zawiera": 1 D$="Podprogram 1 D$="PRZYJEMNEJ": 1 D$="PROGRAM PODAJE LIST 1 D$="PROGRAM 1 D$="PODPROGRAMY MO 1 D$="PO WYWO 1 D$="KODU MASZYNOWEGO": 1 D$=" DEMONSTRACJA ": 1 CU TEGO WIERSZA","0" 1 CIA;ODPOWIEDNIEGO KLAWISZA; 1 CI; ;NIE RELOKOWA 1 CI W EKRAN;NP:JE 1 CI OKRESLON 1 CI OD X (0-255); 1 CI EKRAN.;ADRES POLO 1 CI EKRAN.1/4S;ADRES PO 1 CI EKRAN.1/4D;ADRES PO 1 CI EKRAN W;ZADANYM OKNIE;WYMIARY OKNA MO 1 CI EKRAN 1/4 G 1 ASNYCH;PROGRAM 1 ANIU;PRZYK 1 ANIE PODPROGRAMU;POWODUJE SKOK DO;WYBRANEGO WIERSZA PROGRAMU;Z CHWIL 1 ANIE PODPROGRAMU ~PAUSA~;POWODUJE ZATRZYMANIE PROGRAMU;DO CHWILI NACI 1 AMY W;SKRAJNE PO 1 ADY;NIERELOKOWALNE;NALE 1 ADUJE BLOKI KODU;BEZ NAG 1 ADU UZYSKAMY;INFORMACJ 1 ADU JEST POZA;EKRANEM W 1 ;TO ZNACZY 1 ;PROGRAM DRUKUJE DU 1 ;MELODIE Z 1 ;KLAWISZA ABY URUCHOMI 1 ;KLAWISZ ENTER" 1 ;KLAWISZ (T) :;POWR 1 ;INSTRUKCJ 1 ;H$(PG+I-1 1 ;EKRANU W G 1 ;EKRANU W D 1 ;ADRES 23681 OKRE 1 ;ABY ZASTOSOWA 1 ;(Kl.~6~ lub ~7~);W WYBRANYM MIEJSCU;NAST 1 ;(F1-F2) CZ 1 ;"QWERTYUIOPASDFGHJKLZXCVBNM123456789": 1 ;"QWERTYUIOPASDFGHJKKLZXCVBNM": 1 :$XG:%XOx2%X:&XGy2&X:'XOx2'X:(XGy2(X:)XOx2)X:*XGy2*X:+XOx2+X:,XGy2,X:-XOx2-X:.XGy2.X:/XOx2/X:0XGy20X:1XOx21X:2XGy22X:3XOx23X:4XGy24X:5XOx25X:6XGy26X:7XOx27X:8XGy28X:9XOx29X::XGy2:X:;XOx2;X:[XGy2[X:{XOx2{X: 1 57399,X (0-255);PRZYK 1 57387,X (0-255);PRZYK 1 57016,HA","1" 1 56889,HA","1" 1 56762,HA","1" 1 56635,HA","1" 1 56628,X","0" 1 56622,X","0" 1 56616,HA;ZALE 1 56613,HA;CZ 1 56604,HA","1" 1 56601,HA;ORAZ D 1 56589,HA","1" 1 56587,HA;ORAZ D 1 56488,HA;PROGRAM NIE RELOKOWA 1 56427,Y;USTAWI 1 56329,HA","1" 1 56231,HA","1" 1 56133,HA","1" 1 56039,HA","1" 1 56002,HA;ADRES PIERWSZEGO WIERSZA","1" 1 47009:;D$-~NAPIS~ X-~WIERSZ~;Y-~KOLUMNA POCZ 1 46978,(64 128 192);ILO 1 46972,(0-255);WYPE 1 46958,EFEKT BORDER","0" 1 46877,X;X-KOD WYBRANEGO KLAWISZA","0" 1 46821,HA","1" 1 43596,HA","1" 1 43543,R","0" 1 43509,Y","0" 1 43495,Y;X' Y' WSP 1 43473,X-KOLOR","0" 1 43458,X-KOLOR","0" 1 23736,181:; 1 23306,X","0" 1 008xxxx800 1 00008x88x8000 1 0000 xxx0000xxx 00 1 00 xxx0000xxx 00 1 0(((0000((( 1 0((((00(((( 1 )+"CODE "+S$+","+D$(1 1 (ADR/256)"; 1 (ADR/256)": 1 (";R$;")"; 1 ";S$;",";D$: 1 "9","BEEP","56611","10"," 1 "8","SAVE","56598","13","PROGRAM PRZEGRYWA BLOKI KODU;NA TA 1 "7","LOAD","56584","14","PROGRAM 1 "6","SIATKA","56425","159","PROGRAM WYPE 1 "50","INK","43452","11","FUNKCJA 1 "5","EKRAN4","56327","98","PROGRAM WPISUJE 1/4 1 "49","PAPER","43464","17","FUNKCJA 1 "48","DRAW","43482","24","FUNKCJA 1 "47","PLOT","43507","7","FUNKCJA 1 "45","ERROR","43543","73","WYWO 1 "44","KURSOR","43617","87","PROGRAM USTAWIA WIERSZ;W TRYB EDYCJI;ORAZ USTAWIA KURSOR;NA KO 1 "42","PRINT#9-50","43746","3072","PROCEDURA TA JEST UMIESZCZONA;POD ADRESEM 43746 ABY J 1 "41","LDIR","46819","12","PROGRAM PRZEPISUJE WYBRANY;BLOK PAMI 1 "40","EFEKT3","46832","40","PROGRAM DEMONSTRUJE;CIEKAW 1 "4";"CHCESZ WERYFIKOWA 1 "4","EKRAN3","56229","98","PROGRAM WPISUJE 1/4 1 "39","PAUSA","46873","8","WYWO 1 "38","2 BEEP","46882","63","PROGRAM POZWALA BUDOWA 1 "37","DZWI 1 "35","LITERY 2","47009","1200","PROGRAM UMO 1 "34","RAMKA 2","48209","766","PROGRAM DRUKUJE OZDOBN 1 "33","ATTR OKNO","48976","29","PROGRAM ZMIENIA ATRYBUTY;W ZADANYM OKNIE;WYMIARY OKNA MO 1 "32","CLS OKNO","48976","29","PROGRAM CZY 1 "31","SCROL.OKD","59464","66","PRZESUWANIE ZAWARTO 1 "30","SCROL.OKG","59398","66","PRZESUWANIE ZAWARTO 1 "3";N$;" 1 "3","EKRAN2","56131","98","PROGRAM WPISUJE 1/4 1 "29","DZWIEK 3","59366","32","WYBUCH","0" 1 "28","DZWIEK 2","59342","24","LASER","0" 1 "27","DZWIEK 1","59311","31","IMITACJA KLAKSONU","0" 1 "26","LITERY","59033","278","NIE RELOKOWA 1 "25","GATE LIT","58257","776","ZMIANA CZCIONKI LITER;ABY UZYSKA 1 "24","MEGA LIT","57481","776","ZMIANA CZCIONKI LITER;ABY UZYSKA 1 "23681",I: 1 "23","STARTTAPE","23736","1","PRZYK 1 "22","RAMKA","57404","78","PROGRAM DRUKUJE RAMK 1 "21","EKRAN 2","57392","12","EFEKT PRZESUWANIA EKRANU; 1 "20","EKRAN 1","57380","12","EFEKT PRZESUWANIA ATRYBUT 1 "2";H$(I): 1 "2";"START : 1 "2";"PROGRAM ZAJMUJE "; 1 "2";"NAZWA :";N$;" ";S$;",";D$; 1 "2";"LA=ADR-256* 1 "2","EKRAN1","56037","94","PROGRAM WPISUJE 1/4 1 "19","SCROL DP","57311","69","PROGRAM PRZESUWA PO 1 "18","SCROL LD","57259","52","PROGRAM PRZESUWA DOLN 1 "17","SCROL GL","57193","66","PROGRAM PRZESUWA PO 1 "16","SCROL PG","57141","52","PROGRAM PRZESUWA G 1 "15","SCROL.1/4D","57014","127","PROGRAM WYSUWA ZNAJDUJ 1 "14","SCROL.1/4S","56887","127","PROGRAM WYSUWA ZNAJDUJ 1 "13","SCROL.1/4G","56760","127","PROGRAM WYSUWA ZNAJDUJ 1 "12","SCROL.P","56633","127","PROGRAM WYSUWA ZNAJDUJ 1 "11","CLS","56627","6","PROGRAM CZY 1 "10","SCROLL","56621","6","PROGRAM PRZESUWA TRE 1 "1","2WIERSZE","56000","37","PROGRAM PRZESUWA DWA WIERSZE;EKRANU O JEDEN PUNKT (PIXEL); 1 ","43705","40","PROGRAM PODAJE ILO 1 " PODPROGRAM ZASTOSOWANY JEST W 1 ys=wysoko 1 X W KODZIE;MASZYNOWYM; 1 WIERSZY NA EKRANIE; 1 W;ODPOWIEDNI 1 W;DOWOLNE MIEJSCE;PAMI 1 TYM PROGRAMIE": 1 RAM TOP (ADR); 1 PRZESUWANEGO EKRANU; 1 PROGRAM NALE 1 PODPROGRAM;NALE 1 POD;WSKAZANY ADRES" 1 OKNA NIE ULEGNIE;ZMIANIE","0" 1 NA TEMAT;DANEGO PODPROGRAMU;KLAWISZ (D) :;DEMONSTRACJA;KLAWISZ (S) :;PRZEGRANIE NA TA 1 FUNKCJI AT i TAB"+ 1 EKRANU;DO G 1 DANY;PRZYK 1 D DEMO :S 1 ? (T/N)": 1 (X) USTALA ZAKRES;PRZESUWANIA 1 (I)-Inf. ENTER": 1 tel. 25-35-34 1 JANUSZ GAJDECKI